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USER'S  MANUAL  FOR  MILENG1/UTIL  READ  ONLY  MEMORY  MODULE 
OF  THE  COMBAT  ENGINEER  PROGRAMMABLE  BAND-HELD  CALCULATOR 


1  INTRODUCTION 


Background 

Recent  advancements  in  the  state  of  the  art  of  programmable  calculators 
have  indicated  that  these  devices  might  help  military  engineers  work  more 
efficiently.  To  determine  the  potential  of  these  systems,  in  March  1980  the 
U.S.  Army  Engineer  School  asked  the  U.S.  Army  Construction  Engineering 
Research  Laboratory  (CERL)  to  see  how  hand-held  programmable  calculators  could 
be  exploited  by  combat  engineers.  To  date,  six  pilot  programs  and  ten  utility 
routines  have  been  developed  for  testing.  Details  of  the  study  and  comprehen¬ 
sive  information  on  the  prograns  and  routines  appear  in  CERL  Technical  Report 
P-134,  Software  Documentation  for  MILENG1/UTIL  Read  Only  Memory  Module. 

This  user's  manual  describes  each  MILENG1/UTIL  program,  explains  how  to 
use  each  program,  and  gives  example  problems. 


Conventions 

Only  a  few  conventions  must  be  learned  to  use  the  MILENGl/UTIL  programs 
effectively. 

les/No  Input 

When  the  program  asks  a  question  that  needs  a  "yes"  or  "no”  answer,  the 
calculator  will  display  an  alpha  string  ending  in  (Y/N)?.  To  respond  "yes", 
press  two  keys:  X  and  R/S.*  To  answer  "no",  press  the  N.  and  R/S  keys.  Any 
other  responses  will  be  rejected  by  the  program  and  the  question  will  be 
displayed  again.  When  the  program  asks  this  type  of  question,  it  automati¬ 
cally  puts  the  calculator  in  the  alpha  mode,  then  awaits  your  response. 

Numeric  Input 

When  the  program  asks  for  numeric  input  the  calculator  displays  an  alpha 
string  concatenated  with  a  unit  of  measurement  and  an  ■?.  To  respond,  key  in 
a  numeric  string,  then  press  the  R/S  key.  (Do  not  use  the  ENTER  key.)  If  an 
alpha  string  were  keyed  in,  it  would  be  rejected  and  the  question  would  be 
repeated.  If  the  input  is  not  within  the  allowable  range  specified  in  the 
program,  one  of  the  following  messages  will  be  displayed: 


*  When  several  letters /symbols  are  underlined,  it  means  that  as  a  group  they 
identify  the  name  of  a  single  key  on  the  calculator.  Only  key  function 
names  will  be  shown.  Use  of  the  shift  key,  if  needed,  is  assumed.  Single 
letters  or  numbers  represent  individual  keys  on  the  calculator. 


MUST  BE  <=  (some  maximum  value) 


or 

MUST  BE  >“  (some  minimum  value). 

Then,  the  original  question  will  be  repeated. 

Output 

All  "MILENGl/UTIL"  programs  can  run  with  or  without  a  printer.  If  a 
printer  is  attached,  the  program  stops  only  (1)  when  your  input  is  required 
and  (2)  at  the  end  of  a  program.  If  a  printer  is  not  attached,  the  program 
also  will  stop  after  each  line  of  output.  To  continue  execution,  press  the 
R/S  key  each  time  the  program  stops.  If  you  use  a  printer,  set  it  to  the  NORM 
mode. 

Program  Access 

To  access  a  particular  program,  you  must  "execute"  the  program  name.  For 
example,  to  call  the  MINES  program,  press  XEO  ALPHAMINESALPHA  and  the  program 
will  begin  execution. 

Each  progran  may  be  assigned  to  almost  any  key  on  the  HP-41  calculator. 
For  example,  to  assign  the  MINES  program  to  the>5c  key,  press  ASN 
ALPHAMINESALPHA Then,  when  the  calculator  is  in  the  USER  mode,  the  MINES 

program  will  be  executed  if  thevSc  key  is  pressed.  See  the  HP-41  Owner's  Hand¬ 
book  and  Programming  Guide  for  more  information  on  this  "assign"  feature. 

Size  Check 

Before  a  program  can  be  executed  there  must  be  enough  data  registers 
available  to  run  the  program.  The  minimum  number  of  registers  required  for 
each  program  is: 


PrgRram 

Registers  Reauired 

BRDGCLS 

52 

CPM 

*(2A+43) 

CRATER 

40 

DEMO 

41 

MINES 

53 

HIRE 

44 

*A  ■  Number  of  Activity  Nodes 

To  set  a  program  to  the  correct  size,  press  XEQ  ALPHASIZEALPHA.  The  calcula¬ 
tor  then  will  prompt  for  the  number  of  registers  required.  A  three-digit 
number  must  be  entered;  i.e.,  for  the  BRDGCLS  program,  enter  052.  If  the  pro¬ 
gram  is  sized  incorrectly,  the  program  will  immediately  tell  you  to 

RESIZE  >  (No.  of  Registers  Required,  minus  one). 
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For  example,  if  the  BRDGCLS  program  was  originally  sized  at  040,  the 
BRDCGLS  program  would  display  the  message  RESIZE>  51.  You  would  then  press 
XBtQ  ALPHAS  I Z  EALPHA  052  (or  greater),  and  then  execute  the  program  name  again. 

Register  Use 

Registers  00  through  19  are  reserved  for  your  use.  These  registers  are 
not  used  by  any  of  the  programs  on  MILENGl/UTIL.  However,  the  contents  of 
registers  20  and  above  are  affected,  depending  on  which  programs  are  executed. 
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2  THE  BRIDGE  CLASSIFICATION  PROGRAM  ( BRDGCLS ) 


The  bridge  classification  program  is  used  with  certain  tables  in  FM  5-34 
(September  1976)  to  help  you  determine  bridge  superstructure  classification. 
This  program  may  be  used  for  both  timber  and  steel  stringer  bridges.  It  first 
asks  you  for  the  basic  dimensions  of  the  bridge.  At  the  appropriate  times,  it 
refers  you  to  certain  tables  and  figures  in  FM  5-34,  tells  you  what  entry 
values  are  needed,  and  asks  for  the  value  of  the  variables  corresponding  to 
those  entry  conditions.  You  extract  the  appropriate  value  from  the  manual's 
table  (or  figure)  and  input  it  to  the  calculator.  The  program  determines  the 
limiting  classifications  for  one-  and  two-way  traffic  by  wheeled  and  tracked 
vehicles.  It  determines  the  constraints  imposed  by  moment  capacity,  shear 
capacity,  deck  thickness,  roadway  width,  and  also  determines  if  additional 
braces  are  required. 


General  Program  Information 

Abbreviations  used  in  BRDGCLS  are  listed  in  Table  1.  Input  variable  operating 
limits  are  listed  in  Table  2. 


Program  Sequence 

The  typical  sequence  of  events  and  the  options  you  encounter  when  execut¬ 
ing  this  program  are  shown  in  Figure  1. 


BRDGCLS  Program  Example 

Assume  that  a  bridge  reconnaisance  was  conducted  to  obtain  the  informa¬ 
tion  below  for  a  timber  trestle  bridge.  Determine  the  final  bridge  classifi¬ 
cation. 

Road  Width  »  23  ft  Span  Length  =  17  ft 

Nine  Timber  Stringers,  each  8"  x  18”  Springer  Spacing  =  35  in. 

Deck  *  two  layers  of  3”  x  12"  plank 

Two  Lateral  Braces,  8"  x  10"  at  midpoint  and  at  one  end  of  span. 

Figure  2  shows  how  to  solve  this  problem  using  the  BRGCLS  program.  Fig¬ 
ure  3  is  an  example  of  BRGCLS  output  with  printer  attached. 


Table  1 


BKDGCLS  Abbreviation* 


Svnbol 

CIS. CLASS 

DT 

FIG 

FT 

IB 

KF 

L. M 
LAM 
LI 
M 

M. DL 
M.U 
11 

82 


SECOM 

S.B 

S.S 

STL 

sn 

TAB 

TB1 

THICK 

V 

V.DL 

V.LL 

WT 

(T/B) 

# 

Z 


VttlMUL 

Classification 

Dock  Tbickooss 

Figure 

Feat 

Inches 

Kip 

Haiiata  Span  Length 
La  ins  ted 

Lane 

Mnnant  Capacity 
Dead  Load  Moennt 
Live  Load  Monent 

Effective  Bunber  of  Stringers/Lane 

Effective  Bober  of  8tr  ingers /Lena 
for  a  2-Lane  Bridge 

Keconaai stance 

Maximal  Bracing  Spacing 

Sainger  Spacing 

Steel 

Stringer 

Table 

Tinker 

Thickness 

Shear  Capacity 

Dead  Load  Shear 

Live  Load  Shear 

Way 

(Tea /Bo) 

Haber 
Far cant 


Table  2 


BBDGCLS  Progran  Input 

Variable  Operating  Limta 

Variable 

Units 

JfiAiMB 

Miiiai 

toed,  width 

Feet 

B 

30 

Span  length 

Feet 

10 

200 

Stringer  maker 

Bach 

2 

25 

Stringer  width 

laches 

4 

20 

Stringer  depth 

laches 

6 

60 

Stringer  flange  thickness 

laches 

.3 

2 

Stringer  spacing 

laches 

10 

100 

Deck  Thickness 

laches 

2 

12 

Z  lsninated 

Z 

0 

100 

Bober  of  bracaa 

Bach 

0 

20 

Monent  eapacity 

Kip-Fee e 

3 

3100 

Shear  eapacity 

Kip 

3 

600 

Maxinun  spaa  length 

Feet 

9 

133 

Maxims*  bracing  spacing 

Feet 

6 

26 

Dead  load  noneat 

Kip-Feet 

3 

1200 

Dead  load  shear 

Kip 

1 

63 

Wheal  claaaification 

Claes 

0 

150 

Track  claaaification 

Class 

0 

150 

Claaaifioation 

Source  Safer snee  Bates: 

Class 

0 

150 

FM  3-34  (Sept  an  her  1*7*),  ppa  170-1*4  and  l»*-203. 
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EXECUTE  "BIDGCLS" 

* 

ENTER  ROAD  W1DT1I  IN  KF.ET 

t 

ENTER  SPAN  LENGTH  IN  FEET 

* 

ENTER  NUMBER  OF  STRINGERS 

* 

DECIDE  IF  STRINGERS  ARE  STEEL 

ESTER  STRINGER  WIDTH  IN  INCHES 

ENTER  STRINGER  DEPTH  IN  INCHES 

ENTER  STRINGER  FLANGE^  THICKNESS  IN  INCHES* 

* 

ENTER  STRINGER  SPACING  IN  INCHES 
•  * 

ENTER  DECK  THICKNESS  IN  INCHES 

* 

DECIDE  IF  LAMINATED 


(HO) 


(YES) 


DECILE  IF  LAYERED 
I _ 


ENTER  I  LAMINATED 
- 1 


ENTER  NUMBER  OF  BRACES 

ENTER  MOMENT  CAPACITY  (KIP-Ft/fRCM  TAB.  7-1  OR  7-2,  FM  5 -3 A 

ENTER  SHEAR  CAPACITY  (KIPS)  FROM  TAB.  7-1  OR  7-2,  FM  5-34 

ENTER  MAXIMUM  SPAN  LENGTH  (FT)|fR0M  TAB.  7-1  OR  7-2,  FM  5-34 

ENTER  MAXIMUM  BRACING  SPACING  (FT)  FROM  TAB.  7-2,  FM  5-34* 

ENTER  DEAD  LOAD  MOMENT  (KP-FT)  FROM  FIG.  7-4,  FM  5-34 

♦ 

ENTER  DEAD  LOAD  SHEAR  (KIP)  FROM  FIG.  7-4,  FM  5-34 

f 

PROGRAM  COMPUTES /OUTPUTS  DEAD  LOAD  MOMENT  PER  STRINGER,  LIVE  LOAD  MOMENT  PER 
STRINGER,  EFFECTIVE  NUMBER  OF  STRINGERS  PER  LANE  (N^,  AND  EFFECTIVE 
NUMBER  OF  STRINGERS  PER  LANE  FOR  A  2-LANE  BRIDGE  (N2) 

l 

ENTER  CLASS  OF  WHEELED  VEHICLE  FROM  FIG.  7-3,  FM  5-34 

t 

□ITER  CLASS  OF  TRACKED  VffllCLE  FROM  FIG.  7-3,  FM  5-34 


DEAlt 


PROGRAM  COMPUTES /OUTPUTS  DEAD  LOAD  SHEAR  PER  STRINGER  AND 
LIVE  LOAD  SHEAR  PER  STRINGER 

f 

ENTER  CLASS  OF  WHEELED  VEHICLE  FROM  FIG.  7-5,  FM  5-34 

f 

□ITER  CLASS  OF  TRACKED  VIHICLE  FROM  FIG.  7-5,  FM  5-34 

PROGRAM  COMPUTES  /OUTPUTS  WIDTH  CLASSIFICATION 

ENTER  DECKING  CLASSIFICATION  FROM  FIG.  7-7.  FM  5-34 

PROGRAM  COMPUTES /OUTPUTS 
FI HAL  CLASSIFICATIONS 


•  (ONLY  IF  STEEL  STRINGERS  ARE  USED) 


Figure  1.  BRDGCLS  program  sequence 


ts. 

Era* 

1 

m. 

ALPHA 

BRDGCLS 

ALPHA 

2 

m. 

3 

m. 

4 

23  R/S. 

5 

17  E/S 

6 

R/S 

7 

9  R/S 

8 

N  R/S 

9 

8  R/S 

10 

18  R/S 

11 

35  R/S 

12 

6  R/S 

13 

N  R/s 

14 

*  R/s 

15 

2  R/S 

16 

R/S 

17 

R/S 

18 

E/S 

19 

86.40  R/S 

20 

14.40  R/S 

21 

21.50  R/S 

22 

R/S 

23 

R/s 

24 

37 .36  R/S 

25 

8.75  E/S 

26 

R/s 

27 

R/S 

28 

R/S 

29 

R/S 

30 

R/S 

31 

E/s 

32 

60  R/S 

33 

40  R/S 

34 

R/S 

35 

R/S 

36 

R/s 

37 

R/S 

38 

50  R/S 

39 

40  R/S 

40 

R/S 

41 

S/s 

42 

R/S 

43 

E/i 

44 

E/1 

ficmltm  fijialix 


BRIDGE  CLASS 
RECON: 

ROAD  WIDTH  (FT)  -  ? 
SPAN  LENGTH  (FT)  -  ? 
STRINGERS: 

STR,  NUMBER  -  ? 

STEEL  (Y/N)? 

STR.  WIDTH  (IN)  -  ? 
STR.  DEPTH  (IN)  -  ? 
STR.  SPACING  (IN)  -  ? 
DECK  THICK.  (IN)  -  ? 
LAMINATED  (Y/N)? 

DECK  LAYERED  (Y/N)? 

#  BRACES  “  ? 

CLASS: 

TAB.  7-1,  FM  5-34: 

8. 0X18.0 
M(KP-FT)  -  ? 

V  (KIP)  -  ? 

L. M  (FT)  -  ? 

FIG.  7-4,  FM  5-34: 
TBR,  2  LN,  17.  FT: 

M, DL  (KP-FT)  «  ? 

V.DL  (KIP)  -  ? 
M,DL/STR-  4.2 
M.LL/STR-82 .2 

N1  -  2.71 
N2  -  3.38 
FIG.  7-3,  FM  5-34: 

17  FT.  &  223.  M,LL: 
CLS ,  WHEEL  -  ? 

CLS,  TRACK  «  ? 
V,DL/STR  -  1.0 
V.LL/STR  -  13.4 
FIG.  7-5,  FM  5-34: 

17  FT.  &  52.  V,LL: 
CLS,  WHEEL  -  ? 

CLS,  TRACK  -  ? 

WIDTH  CLS: 

1  WAY  -  100 

2  WAY  -  30 

FIG.  7-7,  FM  5-34: 

DT  -  4.0  &  S,S  «  35.: 
CLASS  -  ? 


Figure  2.  BRDGCLS  pro gran  problem  example. 


Content  a 


See  Note  1 


See  Note  2 


See  Note  3 


See  Note  4 


See  Note  5 
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Ste£ 

Press 

Resulting  Display 

Comments 

45 

12  R/S 

FINAL  CLASS: 

46 

R/S 

ADD  1. BRACES 

See  Note 

47 

R/S 

1  WY  WHEEL  -  12. 

48 

R/S 

2  WY  WHEEL  -  12. 

49 

R/S 

x  nf  TRACK  -  12. 

50 

R/S 

2  WY  TRACK  -  12. 

51 

U i 

END  PROGRAM 

Notes : 

1.  See  Table  7-1,  FM  5-34  for  the  properties  of  timber  stringers. 

2.  See  Figure  7-4,  FM  5-34  to  determine  the  dead  load  moment  and  shear. 

3.  See  Figure  7-3,  FM  5-34  to  determine  the  wheel  and  track  classification 
based  on  moment  capacity. 

4.  See  Figure  7-5,  FM  5-34  to  determine  the  wheel  and  track  classification 
based  on  shear  capacity. 

5.  See  Figure  7-7,  FM  5-34  to  determine  the  classification  based  on  decking 
thickness. 

6.  If  a  printer  is  connected  and  in  the  NORM  mode,  steps  46  through  51  will 
be  output  automatically. 


Figure  2.  (Cont'd). 


XRCM  "BRDGCLS" 

M.DL/STR-4.2 

M.LL/STR-82.2 

BRIDGE  CLASS 

Nl-2.71 

RECON 

N2-3.38 

ROAD  WIDTH (FT)-? 

PIG . 7-3 , FM5-34 : 

23. 

RUN 

17.FT.&223.M.LL 

SPAN  LENGTH(FT)-? 

CLS,  WHEEL-? 

17. 

RUN 

60. 

STRINGERS: 

CLS,  TRACK-? 

STS,  NUMBER-? 

40. 

9. 

RUN 

V.DL/STR-l.O 

STEEL(T/N)? 

V.LL/STR-13.4 

N 

RUN 

FIG.7-5,FM5~34 : 

STR.  WIDTH(IN)-? 

17.PT.&52.V.LL: 

8. 

RUN 

CLS,  WHEEL-? 

STR.  DEPTH(IN)-? 

50. 

18. 

RUN 

CLS,  TRACK-? 

STR.  SPACING(IN)-? 

40. 

35. 

RUN 

WIDTH  CLS: 

DECK  THICK. (IN)-? 

1  WAT-100. 

6. 

RUN 

2  WAT-30. 

LAMINATED(T/N)? 

PIG.7-7,FM5-34: 

N 

RUN 

DT-4.06S,S-35. : 

DECK  LAYERED(Y/N>? 

CLASS-? 

Y 

RUN 

12. 

IBRACES-? 

FINAL  CLASS: 

2. 

RUN 

ADD  1.  BRACES 

CLASS: 

1WT  WHEEL-12. 

TAB.7-1.FM5-34: 

2WT  WHEEL-12. 

8.0X81.0 

IWT  TRACK-12. 

M(KP-FT)-? 

2WY  TRACK-12. 

86.40 

RUN 

END  PROGRAM 

V(KIP)-? 

14.40 

RUN 

L,M(FT)«? 

21.50 

RUN 

FIG.7-4,FM5-34. 
TBR.2  LN.17.FT: 
M,DL(KP-FT)-? 

37.36 

RUN 

V,DL(KIP)-? 

8.75 

RUN 

RUM 

SUN 


RUN 

RUN 


RUN 


Figure  3.  BRDGCLS  program  example  (with  printer). 
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3  THE  CRITICAL  PATH  METHOD  PROGRAM  (CPM) 


The  CPM  program  provides  an  easy  way  to  do  the  tedious  calculations  asso¬ 
ciated  with  using  CPM  project  control.  The  CPM  program  uses  activity-on-the- 
node  logic.  Up  to  98  activities  can  be  analyzed  if  the  full  HP-41cv  resident 
capacity  for  data  storage  is  used.  Up  to  20  activities  can  be  done  on  the 
HP-41c  model  without  memory  modules. 

The  program  computes  the  total  float,  the  early  start  time,  the  early 
finish  time,  the  late  start  time,  and  the  late  finish  time  for  each  activity. 
The  "with  printer"  version  prints  out  in  boxes.  These  boxes  can  be  cut  out 
and  pasted  together  to  graph  logical  relationships.  In  the  printer  version, 
the  preceding  activities  for  each  activity  are  noted  to  the  left  of  each 
diagram,  so  the  user  will  know  how  to  connect  the  activities  together.  The 
"without  printer"  output  must  be  copied  as  it  is  output.  Then  diagrams  can  be 
drawn  by  hand  and  annotated  with  the  correct  information. 


General  Program  Information 

Abbreviations  used  in  the  CPM  program  are  listed  in  Table  3.  Variable 
input  operating  limits  are  listed  in  Table  4. 


Program  Sequence 

The  typical  sequence  of  events  and  the  options  you  encounter  when  execut¬ 
ing  this  program  are  shown  in  Figure  4. 


EXECUTE  CPM 

ENTER  TOTAL  NUMBER  OF  ACTIVITIES 

t 

ENTER  ACTIVITY  NUMBER,  DURATION,  AND  PRECEDING 
ACTIVITIES  FOR^  EACH  ACTIVITY 

ENTER  ENDING  ACTIVITIES 

ENTER  STARTING  ACTIVITY  NUMBER 

J 

PROGRAM  COMPUTES  AND  OUTPUTS 
EARLY  START,  EARLY  FINISH,  LATE  START,  LATE 
FINISH,  TOTAL  FLOAT  AND  CRITICAL  PATH 


Figure  4.  CPM  program  sequence. 
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Table  3 


CPM  Pro gran  Abbreviations 


fiariwl 

Meaning 

ACT 

Activity 

CPM 

Critical  Path  Method 

EF 

Early  Finish 

END 

Ending 

ES 

Early  Start 

LF 

Late  Finish 

LS 

Late  Start 

PRED 

Preceding 

START 

Starting 

TF 

Total  Float 

(Y/H) 

(Yes /No) 

* 

Number 

Table  4 

CPM  Program  Variable  Input  Operating  Limits 


Minimum 

Maximum 

Total  Nusiber  of  Activities 

1 

98 

Activity  Identification  Numbers 

1* 

98 

Duration 

0 

1000 

Preceding  Activity  Identification  Numbers 

1* 

98 

Starting  Activity  Number 

1 

98 

*0  is  also  a  valid  input  but  tells  the  program  that  there  are  no  more 
inputs  for  these  variables. 


The  limits  set  for  preceding  activity  numbers  (i.e.,  the  identification 
number)  show  that  you  can  enter  any  activity  between  1  and  98.  However,  the 
total  number  of  preceding  activities  for  a  single  activity  cannot  exceed  five. 
The  registers  will  be  disrupted  if  more  than  five  preceding  activities  or  more 
than  25  ending  activities  are  used.  The  CPM  progrms  is  not  designed  to  check 
these  last  two  limits. 
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Given  the  following  information,  determine  the  early  start,  early  finish, 
late  start,  late  finish,  and  total  float  for  each  activity  using  the  critical 
path  method. 


Activity  No. 


1 

2 

3 

4 

5 


Duration 


PtfiCg.4iag.  Activity 


15 

20 

18 

18 

20 


1 

1 

3 

2,4 


Table  3 


CFM  Program  Abbreviations 


Symbol 

Meaning 

ACT 

Activity 

CPM 

Critical  Path  Method 

EF 

Early  Finish 

END 

Ending 

ES 

Early  Start 

LP 

Late  Finish 

LS 

Late  Start 

PRED 

Preceding 

START 

Starting 

TF 

Total  Float 

(Y/N) 

(Yes /No) 

# 

Number 

Table  4 

CPM  Program  Variable  Input  Operating  Limits 


Variable 

Minimum 

Maximum 

Total  Number  of  Activities 

1 

98 

Activity  Identification  Numbers 

1* 

98 

Duration 

0 

1000 

Preceding  Activity  Identification  Numbers 

1* 

98 

Starting  Activity  Number 

1 

98 

*0  is  also  a  valid  input  but  tells  the  program  that  there  are  no  more 
inputs  for  these  variables. 


The  limits  set  for  preceding  activity  numbers  (i.e.,  the  identification 
number)  show  that  you  can  enter  any  activity  between  1  and  98.  However,  the 
total  number  of  preceding  activities  for  a  single  activity  cannot  exceed  five. 
The  registers  will  be  disrupted  if  more  than  five  preceding  activities  or  more 
than  25  ending  activities  are  used.  The  CPM  pro gras  is  not  designed  to  check 
these  last  two  limits. 
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Stag 

1 


lim 

xeo 

alpha 

CPM 


2 

ALPHA 
5  1/S 

3 

1  R/S 

4 

15  R/S 

5 

0  R/S 

6 

2  R/S. 

7 

20  R/S 

8 

l  R/s 

9 

0  R/S 

10 

3  R/S 

11 

18  R/S 

12 

i  R/s 

13 

o  i/s 

14 

4 

15 

18  R/S 

16 

3  R/S 

17 

0  R/S 

18 

5  1/1 

19 

20  1/S 

20 

2  R/S 

21 

41/S 

22 

o  i/s 

23 

0  R/S 

24 

N  1/S 

25 

5  1/S 

26 

0  i/s 

27 

l  R/s 

28 

R/S 

29 

R/S 

30 

R/S 

31 

R/S 

32 

R/S 

33 

R/S 

34 

R/S 

35 

R/s 

36 

R/S 

37 

R/S 

38 

R/S 

39 

R/S 

40 

R/S 

41 

R/S 

42 

43 

R/S 

fit 

44 

R/S 

Resulting  Di»t>l«v 


TOTAL  #  ACTIVITIES  -  ? 
ACTIVITY  #  -  ? 

DURATION  -  ? 

PRED.  ACT  -  ? 

ACTIVITY  #  -  ? 

DURATION  -  ? 

PRED.  ACT  -  ? 

PRED.  ACT  -  ? 

ACTIVITY  #  -  ? 

DURATION  -  ? 

PRED.  ACT  -  ? 

PRED.  ACT  -  ? 

ACTIVITY  #  -  ? 

DURATION  -  ? 

PRED.  ACT  -  ? 

PRED.  ACT  -  ? 

ACTIVITY  #  -  ? 

DURATION  -  ? 

PRED.  ACT  -  ? 

PRED.  ACT  -  ? 

PRED.  ACT  -  ? 

ACTIVITY  *  -  ? 

ANY  CHANGES  (Y/N)? 
ENTER  HIDING  ACTIVITIES 
END  ACT.  #  -  ? 

HID  ACT.  #  -  ? 

START  ACT.  #  -  ? 

ACT  #  -  1. 

DURATION  -  15. 

ES  -  0. 

EF  -  15. 

LS  -  0. 

LF  -  15. 

TF  ■  0 
ACT  #  -  2. 

DURATION  -  20. 

PRED.  ACT  -  1. 

ES  -  15. 

EF  -  35. 

LS  -  31. 

LF  -  51. 

TF  «  16. 

ACT  #  -  3. 

DURATION  -  18. 

HIED.  ACT  -  1. 


Figure  5.  CPM  program  problem  example. 


Consents 

See  Note  1 


See  Note  2 
See  Note  3 
See  Note  4 


Step 


Pres  a 


Comnentfl 


45 

R/S 

ES  -  15. 

46 

R/S 

EF  -  33. 

47 

R/S 

LS  -  15. 

48 

R/S 

LF  -  33. 

49 

RlS 

TF  -  0. 

50 

R/S 

ACT  #  -  4. 

51 

R/S 

DURATION  -  18 

52 

JL/JL 

PRED.  ACT  -  3 

53 

R/S 

ES  -  33. 

54 

R/S 

EF  -  51. 

55 

R/S 

LS  -  33. 

56 

R/S 

LF  -  51. 

57 

R/S 

TF  -  0. 

58 

R/S 

ACT  #  -  5. 

59 

R/S 

DURATION  -  20 

60 

R/S 

PRED.  ACT  -  2 

61 

R/S 

PRED.  ACT  -  4 

62 

R/S 

ES  -  51. 

63 

R/s 

EF  -  71. 

64 

R/S 

LS  -  51. 

65 

R/S 

LF  «  71. 

66 

R/S 

TF  -  0. 

67 

R/S 

END  PROGRAM 

Notes : 

1.  Activity  numbers  must  be  positive  integers,  beginning  with  1.  The  numbers 
must  be  consecutive,  but  need  not  be  entered  sequentially. 

2.  Ending  activities  are  those  activities  that  do  not  precede  any  other 
activity. 

3.  The  starting  activity  number  will  tell  the  program  where  you  want  to  begin 
to  output  the  results. 

4.  If  the  printer  is  connected  and  in  the  NORM  mode,  lines  28  through  67  will 
be  output  automatically.  You  do  not  have  to  press  the  R/S  key. 


Figure  5.  (Cont'd) 


am  1 

"CFM" 

TOTAL  I ACTIVITIES-? 

5. 

RUN 

ACTIVITY#-? 

1. 

RUN 

DURATION-? 

15. 

RUN 

FRED.  ACT-? 

0. 

RUN 

ACTIVITY#-? 

2. 

RUN 

DURATION-? 

20. 

RUN 

FRED.  ACT-? 

1. 

RUN 

FRED.  ACT-? 

0. 

RUN 

ACTIVITY#-? 

3. 

RUN 

DURATION-? 

16. 

RUN 

FRED.  ACT-? 

1. 

RUN 

FRED.  ACT-? 

0. 

RUN 

ACTIVITY#-? 

A. 

RUN 

DURATION-? 

18. 

RUN 

FRED.  ACT-? 

3. 

RUN 

FRED.  ACT-? 

0. 

RUN 

ACTIVITY#-? 

5. 

RUN 

DURATION-? 

20. 

RUN 

FRED.  ACT-? 

2. 

RUN 

FRED.  ACT-? 

A. 

RUN 

FRED.  ACT-? 

0. 

RUN 

ACTIVITY#-? 

0. 

RUN 

ANY  CHANGES(Y/N)? 

N 

RUN 

ENTER  ENDING  ACTIVITIES 

END  ACT.#-? 

5. 

RUN 

END  ACT.#-? 

0. 

RUN 

ST AIT  ACT.#-? 

1.  RUB 

see  krt(t/»)? 

T  ROB 


Simple  Network 


Cut  a  Poste  Solution 


/  I.  II.  15./ 


✓  5i.  *•*•«  ?l,r 


/R  DCTI  (f/ 

'  MRBTIOM  / 
/IS  LF/ 


Figure  6.  CPM  progran  example  (vith  printer). 
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4  THE  ROAD  CRATER  PROGRAM  (CRATER) 


The  road  crater  program  computes  the  amount  of  explosive,  number  of 
cratering  charges,  and  the  number  and  depth  of  holes  needed  to  produce  hasty, 
deliberate,  or  relieved-face  road  craters  for  lengths  of  crater  you  specify. 


Ggneral  Program  Information 

Abbreviations  used  in  the  CRATER  program  are  listed  in  Table  5.  Input 
variable  operating  limits  are  listed  in  Table  6. 


Program  Sequence 

The  typical  sequence  of  events  and  the  options  you  encounter  when  execut¬ 
ing  this  program  are  shown  in  Figure  7. 


CRATER  Program  Example 

Determine  how  much  TNT,  how  many  boreholes,  and  how  many  40-lb  cratering 
charges  are  required  to  blast  a  41-ft-long  deliberate  crater. 

Figure  8  shows  how  to  solve  this  problem  using  the  CRATER  program.  Fig¬ 
ure  9  gives  three  examples  of  CRATER  program  output  with  printer  attached. 


EXECUTE  CRATER 

J 

ENTER  CRATER  LENGTH 

I 

INDICATE  IF  CRATERING  CHARGES  ARE  TO  BE  USED 

I 

SELECT  TYPE  OF  CRATER 


ENTER  CRATER  DEPTH 
(for  "hasty"  option  only) 


PROGRAM  COMPUTES  AND  OUTPUTS  RESULTS 


Figure  7.  CRATER  program  sequence. 
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Table  5 


CRATER  Program  Abbreviations 


CSC 

Charge 

EXP  10 

Exploaive(a) 

FT 

Feet 

US 

Pouada 

(T/R) 

(Tea /Ho) 

# 

Hwber 

Sue  of  (Total) 

Table  6 


CRATER  Progran  Input  Variable  Operating  Limits 


Ystiabls 


jliAiua 


Cntu  Length  Feat  12 

Crater  Depth  Feet  7.5 

Source  Reference  Note*: 


999 

15 


FM  3-34  (September  1976).  pp  28-32 

FM  3-33  (February  1971),  pp  3-21  through  3-23 


Eu  £ciu 


IsmlllM  JIibUt  CnwsstB 


1 

HR 

n.rSA 

CUTES 

AURA 

CUTES  users,  (FT)  -  T 

2 

41  HI 

QBE  CUTES  CUSCE  (T/H)T 

3 

T5g 

CUTES  TTPE: 

4 

HAST!  (T/H)t 

3 

■  111 

DELIBERATE  (T/H)t 

6 

'ft 

#  7  FT.  SOUS  -  4. 

7 

#  5  FT.  SOUS  -  2. 

8 

111 

*  cum  cbc  -  lo. 

9 

111 

FSXMU:  TXT,  US  -  2. 

10 

111 

EXPLO,  U  -  402. 

11 

111 

ALSO:  REED  SUFE  CHARGES 

12 

111 

TO  BLAST  BORBOLESI 

13 

111 

WD  FROGRAX 

Setae: 

1.  Crater-type  Menu  Order:  Haaty,  Deliberate,  Reliered-Faca 


See  Rote  1 
Sea  Rote  2 


2,  It  a  priatar  ia  connected  and  in  the  ROW  node,  Stepa  7  through  13  will  be 
output  automatically . 


Figure  8.  CRATER  progrsm  problem  example* 
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XROM  "CRATER" 

XROM 

"CRATER 

CRATER  LENGTH, (FT)-? 

CRATER  LENGTH, (FT )- 

? 

41 .0  RUN 

41.0 

RUN 

USE  CRATER  CHARGE( Y/N)? 

USE  CRATER  CHARGE (Y/N)? 

N  RUN 

Y 

RUN 

CRATER  TYPE: 

CRATER  TYPE: 

HASTY( Y/N)? 

HASTY(Y/N)? 

Y  RUN 

N 

RUN 

CRATER  DEPTH, (FT)-? 

DELIBERATE( Y/N) ? 

7.5  RUN 

N 

RELIEVED  FACE( Y/N)? 

RUN 

IHOLES-6. 

HOLE  DEPTH, FT- 5.0 

Y 

RUN 

EXPLOSIVE,  LBS/HOLE- 50. 

FRIEND  SIDE: 
#5FT.HOLES-6. 

EXPLO, ELB- 300. 

# CRATER  CHG-6. 

ALSO:  NEED  SHAPE  CHARGES 

TO  BLAST  BOREHOLES! 

PRIMER: TNT, LBS-6. 

END  PROGRAM 

ENEMY  SIDE: 

I4FT.HOLES-5. 

TNT.LBS-150. 


XROM  "CRATER" 

CRATER  LENGTH, (FT)-? 

EXPLO, ILB-396. 

41 .0  RUN 

ALSO:  NEED  SHAPE  CHARGES 

USE  CRATER  CHARGE( Y/N)? 

TO  BLAST  BOREHOLES! 

Y  RUN 

CRATER  TYPE: 

HASTY(Y/N)? 

N  RUN 

DELIBERATE(Y/N)/? 

Y  RUN 

END  PROGRAM 

I7FT.HOLES-4. 

#5FT.HOLES-2. 

CRATER  CHG-10. 

PRIMER: TNT, LBS-2. 

EXPLO,  ILB-402. 

ALSO:  NEED  SHAPE  CHARGES 
TO  BLAST  BOREHOLES! 

END  PROGRAM 


Figure  9.  CRATER  program  examples  (with  printer). 
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5  THE  DQ10LITI0N  PROGRAM  (DEMO) 


The  demolition  program  determines  the  amount  of  explosive  required,  the 
number  of  explosive  units,  the  number  of  charges,  and  the  minimum  safe  dis¬ 
tance  for  the  following  engineer  activities:  cutting  timber,  cutting  steel, 
and  breaching  walls.  A  menu  of  explosive  types  to  be  used  is  also  presented. 
The  progrmn  has  three  timber  cutting  options:  internal  charge  placement, 
external  placement,  and  abatis.  The  steel  cutting  options  cover  four  applica¬ 
tion  areas:  railroad  rails,  round  steel  sections,  structural  steel  sections, 
and  carbon  steel  rods.  The  breaching  applications  are  used  in  conjunction 
with  applicable  tables  in  FM  5-34. 


General  Program  Information 

Abbreviations  used  in  the  DEMO  program  are  listed  in  Table  7.  Input 
variable  operating  limits  are  listed  in  Table  8. 


Program  Sequence 

The  typical  sequence  of  events  and  the  options  you  encounter  when  execut¬ 
ing  this  program  are  showu  in  Figure  10. 


DEMO  Program  Example 


Determine  the  amount  of  explosive  required,  the  number 
units,  the  number  of  charges,  and  the  miminum  safe  distance 


of  explosive 
required  to  breach 


EXECUTE  DEMO 

I 

SELECT  TYPE  OF  EXPLOSIVE 

I 

CHOOSE  APPLICATION 

J 

ENTER  APPROPRIATE  DATA  FOR  THE  CHOSEN  APPLICATION 

I 

PROGRAM  COMPUTES  AND  OUTPUTS : 

POUNDS  OF  EXPLOSIVE  REQUIRED 
NUMBER  OF  EXPLOSIVE  UNITS 
NUMBER  OF  CHARGES  (for  BREACHING  APPLICATION) 
"IN  OPEN"  SAFE  DISTANCE 


Figure  10.  DEMO  program  sequence. 
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Table  7 


DEMO  Program  Abbreviations 


Svmbol 

Meaning 

BREACH 

Breaching 

C 

Tamping  Factor 

CONOR 

Concrete 

DEMO 

Demolition 

DIA 

Diameter 

DIST 

Distance 

EXPLO 

Explosive 

EXTERN 

External 

FT 

Feet 

HT 

Height 

IN 

Inches 

INTERN 

Internal 

K 

Material  Factor 

LB 

Pound (s) 

M 

Meter 

MIN 

Minimum 

REINF 

Reinforced 

REQD 

Required 

RR 

Railroad 

SECT 

Section 

STL 

Steel 

STR.STL. 

Structural  Steel 

SQ.  IN 

Square  Inches 

TAB 

Table 

X-SECT 

Cross-Sectional 

(Y/N) 

(Yes/No) 

* 

Number 

Table  8 

DEMO  Program 

Input  Variable  Operating  Limits 

Variable 

Units  Minimum 

Maximum 

Timber  Diameter 

Inches  0.5 

180 

Rail  Height 

Inches  1 

9 

Bar  Diameter 

Inches  0 

24 

X-Sect  Area 

(Inch)2  0 

99 

Section  Diameter 

Inches  0 

99 

Material  Factor,  K 

0.07 

1.76 

Tamp  Factor  >  C 

1 

3.6 

Barrier  Width 

Feet  0 

999 

Breaching  Radius 

Feet  0.1 

99 

Source  References: 

FM  5-34  (September  1976),  pp  24-29 
FM  5-29  (February  1971),  pp  1-6  and  3-20 


i 


26 


a  reinforced  wall  7-1/2  ft  thick  and  42  ft  long,  using  ground  placed,  tamped 
charges. 

Figure  11  shows  how  to  solve  this  problem  using  the  DEMO  progras.  Figure 
12  gives  three  examples  of  DEMO  program  output  with  printer  attached. 


Step  Press  Resulting  Display  Conments 


1 

m. 

ALPHA 

DEMO 

ALPHA 

EXPLOSIVE  TYPE: 

See  Note  1. 

2 

RlS 

TNT  (Y/N )? 

3 

N  R/S 

M112  C4  (1.25  LB)  (Y/N)? 

4 

N  R/S 

M5A1  C4  (2.5  LB)  (Y/N)? 

5 

N  R/S 

DYNAMITE,  Ml  (Y/N)? 

6 

Y  R/S 

APPLICATION: 

7 

R/S 

CUT  TIMBER  (Y/N)? 

8 

N  R/S 

CUT  STEEL  (Y/N)? 

9 

N  R/S 

BREACH  (Y/N)? 

10 

Y  R/S 

TAB.  2-3,  FM  5-34: 

See  Note  2. 

11 

R/s 

MATERIAL  FACTOR,  K  -  ? 

12 

.54  1/S 

TAB.  2-4,  FM  5-34: 

See  Note  3. 

13 

R/S 

TAMP  FACTOR,  C  -  ? 

14 

2  R/S 

BARRIER  WIDTH,  (FT)  >*  ? 

15 

42  R/S 

BREACH.  RADIUS,  (FT)  -  ? 

16 

7.5  R/S 

REQD.  EXPLO,  LBS  -  1,486.5 

17 

R/S 

#  EXPLO.  UNITS  -  2,973. 

See  Note  4. 

18 

R/S 

*  CHARGES  -  3. 

19 

R/S 

OPEN,  SAFE  DIST,  M  »  1.141. 

20 

R/S 

END  PROGRAM 

Notes : 

1.  Explosive  Type  Menu  Order:  TNT,  M112  C4(1.25  lb),  M5A1  C4(2.5  lb),  Dynam¬ 
ite,  Tetrytol,  M118  Sheet  (0.5  lb),  M186  Roll  (25  lb) 

2.  See  Table  2-3,  FM  5-34  to  determine  the  material  factor,  K 

3.  See  Table  2-4,  FM  5-34  to  determine  the  tamp  factor,  C 

4.  If  a  printer  is  connected  and  in  the  NORM  mode,  steps  17  through  20  will 
be  output  automatically. 


Figure  11 .  DEMO  program  problem  example. 
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XROM  "DEMO" 


EXPLOSIVE  TYPE: 

TNT( Y/N)? 

N 

RUN 

M112  C4(1.25LB)( Y/N)? 
Y 

RUN 

APPLICATION: 

CUT  TIMBER( Y/N)? 

Y 

RUN 

TIMBER  DIA. (IN)-? 

24.0 

RUN 

CHARGE  PLACEMENT: 
ABATIS(Y/N)? 

N 

RUN 

EXTERN. (Y/N)? 

Y 

RUN 

REQD . EXPLO , LBS- 1 1 . 3 
#EXPLO.UNITS-9. 

IN  OPEN, SAFE  DIST.M-300. 
END  PROGRAM 


XROM  "DEMO" 


EXPLOSIVE  TYPE: 
TNT(Y/N)? 

Y 

RUN 

BLOCKS , TNT, 1 LB( Y/N) ? 

N 

RUN 

APPLICATION: 

CUT  TIMBER( Y/N)? 

N 

RUN 

CUT  STEEL(Y/N)? 

Y 

RUN 

TYPE  STEEL: 
RR.RAIL(Y/N)? 

Y 

RUN 

RAIL. HT. (IN)-? 

5.0 

RUN 

RR.FROG( Y/N)? 

N 

RUN 

REQD. EXPLO, LB S-I.O 
# EXPLO , UNITS" 2 . 

IN  OPEN, SAFE  DIST,M-300. 
END  PROGRAM 


XROM  "DEMO" 


EXPLOSIVE  TYPE: 

TNT(Y/N)? 

N  RUN 

M112  C4(1.25LB)(Y/N)? 

N  RUN 

M5A1  C4(2.5LB)(Y/N)? 

N  RUN 

DYNAMITE, Ml (Y/N)? 

Y  RUN 
APPLICATION: 

CUT  TIMBER(Y/N)? 

RUN 

CUT  STEEL( Y/N)? 

N  RUN 

B1EACH( Y/N)? 

Y  RUN 
TAB-2-3.FM5-34: 

MATERIAL  FACTOR, K-? 

.54  RUN 

TAB • 2-4 , FM5-34 : 

TAMP  FACTOR, C-? 

2.0  RUN 

BARRIER  WIDTH, (FT)-? 

42.0  RUN 

BREACH,  RADIUS, (FT)-? 

7.5  RUN 


REQD . EXPLO , LBS- 1 , 486 . 5 
#EXPLO.UNITS-2,973. 

# CHARGES- 3. 

OPEN, SAFE  DIST.M-I , 141 . 
END  PROGRAM 


Figure  12.  DEMO  program  examples  (with  printer). 
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6  THE  MINEFIELD  PROGRAM  (MINES) 


The  minefield  program  computes  the  logistical  requirements  for  installing 
a  standard  pattern  minefield  given  the  field  density,  the  irregular  outer-edge 
cluster  composition,  the  field  length  and  depth,  and  conditions  under  which 
the  work  is  to  be  done. 


General  Program  Information 

Abbreviations  used  in  the  MINES  progran  are  listed  in  Table  9.  Input 
variable  operating  limits  are  listed  in  Table  10. 


Program  Sequence 

The  typical  sequence  of  events  and  the  options  encountered  when  executing 
the  MINES  program  is  shown  in  Figure  13 . 


MINES  Program  Example 

Determine  the  logistical  requirements  for  a  minefield,  400-m  long  and 
400-m  deep,  with  an  AT-APF-APB  mine  density  of  1-1-0,  and  an  AT-APF-APB  mine 
Irregular  Outer  Edge  (IOE)  cluster  composition  of  1-2-2. 

Figure  14  shows  how  to  solve  this  problem  using  the  MINES  program.  Fig¬ 
ure  15  gives  two  examples  of  MINES  program  output  with  printer  attached. 

EXECUTE  MINES 

J 

ENTER  MINE  DSISITIES 

I 

ENTER  IOE  CLUSTER  COMPOSITION 

I 

INDICATE  IF  NIGHT  WORK  IS  TO  BE  DONE 

i 

INPUT  MINEFIELD  LENGTH  IN  METERS 

l 

PROGRAM  COMPUTES  LOGISTICAL  REQUIREMENTS 

RETRIEVE  RESULTS 


Figure  13.  MINES  program  sequence. 
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Table  9 


MINES  Program  Abbreviations 


Symbol 

MgfthtBR 

APB 

Anti-Personnel  Blast 

APF 

Anti-Personnel  Fragmentation 

AT 

Anti-Tank 

IOE 

Irregular  Outer  Edge 

M 

Meter(s) 

MAX 

Maximum 

MMF 

Main  Minefield 

RL 

Reel(s) 

(Y/N) 

Yea /No 

Number 

Table  10 

MINES  Program  Input  Variable  Operating  Limits 


-Vftripbl.fi 

Units 

Minimum 

Maximum 

Mine  Densities: 

AT  Mine s /M 

Mines /M 

0 

4 

APF  Mines /M 

Mines /M 

0 

16 

APB  Mine s /M 

Mines/M 

0 

16 

IOE  Cluster  Composition: 
No.  of  AT  Mines 

Each 

0 

1 

No.  of  APF  Mines 

Each 

0 

5 

No.  of  APB  Mines 

Each 

0 

5 

Minefield  Length 

Meters 

0 

5000 

Minefield  Depth 

Meters 

0 

999 

Source  Reference  Notes: 

FM  5-34  (September  1976),  pp  54-59 
FM  5-20  (November  1976) 
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Step  Preee 


1 

XEQ 

ALPHA 

MINES 

ALPHA 

2 

m 

3 

3  R/S 

4 

4  R/S 

5 

8  R/S. 

6 

R/S 

7 

1  R/S. 

8 

2  R/S 

9 

2  R/S 

10 

N  R/S. 

11 

400  R/S 

12 

400  R/S 

13 

R/s 

14 

R/S 

15 

R/S 

16 

R/S 

17 

R/S 

18 

R/S 

19 

R/S 

20 

R/S 

21 

R/s 

22 

R/S 

23 

R/S 

24 

R/S 

25 

R/S 

26 

R/S 

27 

R/S 

28 

R/S 

29 

R/S 

30 

R/S 

31 

R/S 

Resulting  Display  CglP  fiatg 


ENTER  MINE  DENSITY: 

#  AT/M  -  ? 

#  APF/M  -  ? 

#  APB/M  -  ? 

10 E  CLUSTER  COMPOSITION: 

#  AT  •  1 

#  APF  -  ? 

#  APB  -  ? 

DO  AT  NIGHT  (Y/N )? 

FIELD  LENGTH,  (M)  -  ? 

FIELD  DEPTH,  (M)  -  ? 

TOTAL  MINES: 

#  AT  -  1,370.  See  Note  1. 

#  APF  -  1,859. 

#  APB  -  3,619. 

IOE  MINES: 

#  AT  -  45. 

#  APF  -  90. 

#  APB  -  90. 

MMF  MINES: 

#  AT  »  1,200. 

#  APF  «  1,600. 

#  APB  -  3,200. 

#  IOE  CLUSTERS  -  45. 

#  STRIPS  -  9. 

2-STRAND,  4-SIDE  FENCE: 

#  WIRE  (RL)  -  13 . 

#  SIGNS,  PICKETS  -  165. 

#  SANDBAGS  -  3,780. 

MANHOURS  -  962. 

END  PROGRAM 


Notes: 

1.  If  a  printer  is  connected  and  in  the  NORM  mode,  steps  13  through  31  will 
be  output  automatically . 


Figure  14.  MINES  program  problem  example. 
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XROM  -HIMES* 
ENTER  MINE  DENSITY: 
MT/H=? 


1.00 

RUN 

»APF/H=’ 

1.00 

RUM 

«PB/H=’ 

2.00 

RUN 

IOE  CLUSTER 

COMPOSITION 

IAT-? 

1. 

RUN 

IAPF=? 

1. 

RUN 

IAPB=? 

1. 

RUN 

10  AT  NIGHT(Y/N>? 

Y 

RUN 

FIELD  LENGTH, <H>=? 

400. 

RUN 

FIELB  DEPTH,  (H)=? 

100. 

RUN 

TOTAL  HINES 
*AT=490. 

IAPF=490. 

MPB=930. 

IOE  HIHES : 

MTM5. 

#APF=45. 

IAPB=45. 

HHF  HIMES 
•AT=40«. 

•APFMB0. 

fAPB=800. 

IIOE  CLUSTERS=45. 
tSTRIPS=3. 

2-STRRHB » 4-S I IE  FENCE: 

#nire<rl>=9. 

#SIGH$,PICKETS=109. 

#SAHDBAGS-!,350. 

KAHH0URS=436. 

END  PROGRAM 


XRQH  -HINES- 
EHTER  MINE  DENSITY 
tfiT/H=’ 


3.00 

RUN 

4APF/H=? 

4.00 

RUN 

4APB/H=7 

6.00 

RUN 

IOE  CLUSTER 

COMPOSITION 

♦AT=? 

1. 

RUN 

IAPF=7 

2. 

RUN 

»APB='> 

2. 

RUN 

DO  AT  HIGHKY/H)? 

N 

RUN 

FIELD  LENGTH, (H)=? 

400. 

RUN 

FIELD  DEPTH, <H>=? 

400. 

RUN 

TOTAL  HINES 
0AT=1,370. 

I8PF=1,859. 

IAPB=3,619. 

IOE  HIMES: 

WT=45. 

IAPF=90. 

#RPB=90. 

HHF  HIMES: 

#AT=1,208. 

#APF= 1,600. 

IAPB=3>200. 

IIOE  CLUSTERS=45. 
ISTRIP$=9. 

2-STRAND, 4-SIBE  FENCE. 
#MIRE(RL)=13. 

♦SIGNS, PICKETS=165. 
ISANDBAGS=3, 280. 
HANH0URS=962. 

END  PROGRAM 


Figure  15.  MINES  program  examples  (with  printer). 
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7  THE  WIRE  OBSTABLE  PROGRAM  (WIRE) 


The  WIRE  obstacle  program  computes  the  logistical  requirements  for 
installing  any  of  seven  common  wire  obstacles:  double  apron  fence,  4-  and  2- 
pace;  double  apron  fence,  6-  and  3-pace;  high  wire;  low  vire;  4-stand  fence; 
triple  standard  concertina;  and  general  purpose  barbed  tape  obstacle.  The 
progran  can  also  be  used  to  compute  the  effective  length  of  the  obstacle 
according  to  its  function  and  location  on  the  battlefield.  If  you  already 
know  the  effective  length,  you  can  input  the  effective  length  directly. 


General  Program  Information 

Abbreviations  used  in  the  WIRE  program  are  listed  in  Table  11 .  Input 
variable  operating  limits  are  listed  in  Table  12. 


Program  Sequence 

The  typical  sequence  of  events  and  the  options  encountered  when  executing 
this  program  are  shovn  in  Figure  16 • 


WIRE  Program  Example 

Determine  the  effective  length,  the  number  of  300-m  sections,  the  amount 
of  material,  the  number  of  manhours,  and  the  number  of  truckloads  required  to 
construct  a  triple-standard  concertina  obstacle.  The  entanglement  is  for  pro¬ 
tecting  an  area  on  the  FEBA  which  has  100  m  of  actual  front.  Only  one  belt  of 
wire  is  to  be  used.  The  construction  is  done  at  night  with  experienced 
troop 8. 

Figure  17  shows  how  to  solve  this  problem  using  the  WIRE  program.  Figure 
18  gives  two  examples  of  WIRE  program  output  with  printer  attached. 


Table  11 


WIRE  Program  Abbreviations 


Symbol  Meaning 


DBL. 

EFF • LEM ■ 
FEBA 
GPBTO 
M 

MED 

T 

(Y/N) 

3-STD 

# 


Double 

Effective  Length 

Forward  Edge  of  the  Battle  Area 

General  Purpose  Barbed  Tape  Obstacle 

Meter(s) 

Medium 

Ton(s) 

(Yes/No) 

Triple  standard 
Number 


Table  12 

WIRE  Program  Input  Variable  Operating  Limits 


Variable 

Vnita 

Minimum 

Maximum 

Camp  Perimeter 

Meter 

0 

50,000 

Length  of  Front 

Meter 

0 

50,000 

Unit  Depth 

Meter 

0 

5,000 

Effective  Length 

Meter 

0 

2,250,00( 

Number  of  Belts 

Each 

1 

9 

Source  Reference  Notes : 

FM  5-34  (September  1976),  pp 

105-109 

FM  5-15  (June  1972),  pp  6-10, 

6-22 ,  and 

6-23 

34 


Execute  WIRE 


Is  Effective  Length  Known? 


NO 


YES 


Select  Type 
of  Troop  Development 


(Base  Camp) 


r 


(FEBA) 


Enter  Camp 
Perimeter  in  Meters 

I _ _ _ 


Enter  Length  of 
Front  in  Meters 

_ I 


Select  How  Wire 
la  To  Be  Used 


Enter  Unit  Depth  in 
Meters  if  Wire  Use  Is 
Supplemental :  FEBA,  REAR 


Program  Computes  Effective 
Length  in  Meters 


Enter 

Effective  Length  in 
Meters 


-*»  Select  Special  Conditions  From  Menu 

* 

Select  Barrier  Type  from  Menu 
Program  Computes  Logistical  Requirements 
Retrieve  Results 


Figure  16.  WIRE  program  sequence. 
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SUP 

Press 

Resulting  Disolav 

Conments 

1 

XEQ 

ALPHA 

WIRE 

ALPHA 

KNOW.  EFF.  LEN  (Y/N)? 

2 

N  R/S 

ON.  FEBA  (Y/N)? 

3 

Y  R/S 

FRONT  LENGTH,  (M)  -  ? 

4 

100  R/S 

#  BELTS  -  ? 

5 

1  R/S. 

WIRE  USE: 

See  Note  1 

6 

R/S 

TACTICAL  (Y/N)? 

7 

Y  R/S 

EFF.  LEN,  M  -  125. 

8 

R/S 

USE  BARBED  TAPE  (Y/N)? 

9 

N  R/S, 

EXPERIENCED  TROOPS  (Y/N)? 

10 

Y  R/S 

USE  DRIVEN  PICKETS  (Y/N)? 

11 

N  R/S. 

DO  AT  NIGHT  (Y/N)? 

12 

Y  R/S 

BARRIER  TYPE: 

See  Note  2 

13 

R/S 

DBL  APRON  4+2  (Y/N)? 

14 

V  R/S 

300M  SECTIONS  -  0.4 

15 

R/S 

PICKETS,  LONG  -  42. 

See  Note  3 

16 

R/S 

PICKETS,  S'iORT  -  83. 

17 

R/S 

#  WIRE  REELS: 

18 

R/S 

USING  U-PICKETS  -  6. 

19 

R/S 

USING  PICKET,  SCREW  «  6. 

20 

R/S 

USING  PICKET,  WOOD  -  7. 

21 

R/S 

MANHOURS  -  25. 

22 

R/S 

#  2.5t  LOADS  -  0.3 

23 

R/l 

END  PROGRAM 

Notes : 

X.  Wire  Use  Menu  orders 

:  Tactical, 

Protective,  Supplemental 

2.  Barrier  Type  Menu  Order:  double  apron,  4-  and  2-pace;  double  apron,  6- 
and  3-pace;  high  wire;  low  wire;  4-wire  fence;  triple  standard  concertina; 
general  purpose  barbed  tape  obstacle 

3.  If  a  printer  is  connected  and  in  the  NORM  mode,  do  not  press  the  R/S  key 
for  Steps  15  through  23*  The  results  will  be  output  automatically. 


Figure  17.  WIRE  program  problem  example. 
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XROff  -HIRE’ 
KNON.EFF.LEN.<Y/N)? 

N  RUN 

ON.FEBAIY/N)? 

Y  RUN 
FRONT  LENGTH, <«>=? 

108.  RUN 

«ELTS=? 

1.  RUN 

HIRE  USE: 

TACTICALIY/N)? 

Y  RUN 
EFF.LEN,ft=125. 

USE  BARBEB  TAPE<Y/N>? 

N  RUN 

EXPERIENCED  TR00PS<Y/N)? 

Y  RUN 

USE  DRIVEN  PICKETS<Y/NP 
N  RUN 

DO  RT  NIGHT(Y/N>? 

Y  RUN 
BARRIER  TYPE 

DHL  APRON  4*2<Y/N>? 

Y  RUN 

300ft  SECTIONS=0.4 
PICKETS,L0NG=42. 

PICKETS,  SHORT=83. 

WIRE  REELS: 

USING  U-PICKETS=8. 

USING  PICKET, $CREH=G. 
USING  PICKET, HOOD*?. 
NANH0URS*25. 
I2.5’LOA1S=0.3 
END  PROGRRM 


XROft  ‘HIRE* 
KNON.EFF.LEN.(Y/ft)? 

Y  RUN 

EFF.LEN.<H)=? 

1,500.  RUN 

USE  BARBED  TAPEIY/N)? 

N  RUN 

EXPERIENCED  TROOPS(Y/N)’ 


H 

RUN 

USE  DRIVEN  PICKETSIY/N)’ 

Y 

10  AT  HIGHKY/N)? 

RUN 

N 

BARRIER  TYPE: 

RUN 

IN.  APRON  4*2<Y/H>? 
N 

RUN 

161  APRON  6*3<Y/N>? 
N 

RUN 

NIGH  MIREfY/N)? 

N 

RUN 

LON  HIRE(Y/N)? 

H 

RUN 

4-NIRE  FEHCE(Y/N)? 

N 

RUN 

C0NCERTINA,3-STD(Y/N)? 

Y 

RUN 

300ft  $ECTIONS=5.0 
PICKETS, LONG=808. 
PICKETS,  SHORT=20. 
WIRE  REELS: 

USING  U-PICKETS*15. 
USING  PICKET, SCREH*15. 
USING  PICKET, HOOI=15. 
ROLL, CONCERTINAS. 
STAPLES=1,585. 
HANNOURS=150. 
I2.5'L0ABS*5.4 
END  PROGRRM 


Figure  18.  WIRE  pro gran  examples  (with  printer). 
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8  GLOBAL  UTILITY  SUBROUTINES 


The  global  subroutines  are  used  by  the  six  main  application  programs 
stored  on  MILENGl/UTIL  and  can  be  used  by  you  to  write  your  own  programs.  The 
subroutines  can  also  be  used  by  other  military  engineering  programs  that  may 
one  day  be  stored  on  ROMs  designed  to  be  used  concurrently  with  the 
MILENGl/UTIL  ROM.  This  convention  will  save  a  lot  of  room  on  future  ROMs  and 
in  user-developed  programs  —  room  that  would  otherwise  be  needed  to  store 
similar  subroutines.  If  programmers  adopt  these  subroutines,  the  military 
engineer  community  should  find  it  easier  to  understand  each  others'  programs. 


Convent  ions 

The  following  information  on  register  use  applies  to  all  global  utility 
subroutines.  Registers  20  through  29  are  reserved  for  existing  and  future 
global  utility  subroutines.  Registers  20  through  23  are  used  to  store  tem¬ 
porarily  up  to  24  characters  of  a  message  that  will  be  presented  as  a  prompt 
of  some  sort  to  a  program  user.  Each  register  stores  up  to  Bix  characters. 
Register  24  is  an  indirect  storage  register  for  a  "pointer"  to  show  where  the 
next  input  value  will  be  stored.  Registers  25  and  26  store  the  minimum  and 
maximum  limits,  respectively,  of  the  current  input  variable.  Registers  27 
through  29  are  reserved  for  global  subroutines  that  may  be  developed  in  the 
future. 

The  following  flag  conventions  are  also  used.  Flag  "10"  records  the 
results  of  a  yes/no  question.  The  flag  is  set  if  the  response  is  "Y"  (yes) 
and  cleared  if  the  response  is  "N"  (no).  Flag  "9"  is  programmed  into  subrou¬ 
tine  *1  (numeric  input)  and  *A  (alpha  input)  to  allow  an  answer  already  stored 
somewhere  to  be  used  instead  of  the  user-defined  values  (alpha  or  numeric) 
that  usually  result  when  the  *1  and  *A  subroutines  are  invoked.  Although  this 
option  is  not  used  in  any  of  the  six  main  application  programs  on 
MILENGl/UTIL,  the  potential  to  bypass  the  normal  user-input  route  and  to  use  a 
value  already  in  the  system  is  available  in  these  two  subroutines.  This  flex¬ 
ibility  may  be  useful  in  future  applications. 

Flag  "8"  was  not  used  in  the  MILENGl/UTIL  programs.  It  is  reserved  for 
future  use  as  a  "global  use"  flag,  which  "jumps  over"  certain  parts  of  a  pro¬ 
gram  that  do  not  have  to  be  executed  each  time  on  repetitive  runs.  Flags  "0" 
through  "7"  are  reserved  for  application  program  use  and  are  cleared  each  time 
the  *F  subroutine  is  invoked. 


Global  Subroutine  *S 

Running  global  subroutine  *S  should  always  be  one  of  the  first  steps  in 
any  program;  this  insures  that  adequate  data  registers  have  been  allocated  for 
the  program  being  executed.  If  enough  registers  are  available,  the  sub¬ 
routine  returns  to  the  main  program  and  continues  execution;  if  not,  a  user  is 
prompted  to  resize  the  memory.  The  program  must  then  be  restarted. 

Before  using  the  subroutine,  the  entry  condition  must  first  be  satisfied. 
The  number  of  data  registers  required  for  the  program  is  first  loaded  into  the 
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X  register.  Note  that  this  is  the  actual  number  required,  not  the  number  of 
the  highest  register,  which  would  be  one  less  because  register  00  counts  as 
one  register.  *S  is  then  executed. 

The  following  exit  conditions  are  observed:  *S  returns  to  the  calling 
program  if  adequate  registers  are  available;  otherwise,  *S  prompts  to  resize. 
Assume  that  the  stack  contents  are  destroyed  upon  the  return. 

A  sample  calling  sequence  follows: 


Program 

Instruction 

61 


XEO  "*S" 


Explanat ion 

Loads  ”6 1’*  into  X  register;  says  that  61  registers 
(0  through  60)  are  required  for  this  particular  program 

Calls  the  *S  subroutine 


xxxxxxxxxx 


Resume  with  main  program 


Note  that  *S  also  uses  global  subroutines  *0  and  *D. 


Global  Subroutine  *F 

This  subroutine  clears  flags  "00"  through  "07";  it  should  be  used  to  ini¬ 
tialize  a  program  and  to  "clean  up"  at  the  end  of  each  application  program. 

To  use  the  subroutine,  simply  execute  *F.  *F  returns  to  the  calling  pro¬ 
gram  once  flags  "00”  through  "07"  have  been  cleared. 

A  sample  calling  sequence  follows: 

Program 

laatmcxioa  Explangt  ion 

XEO  *F  Calls  the  *P  subroutine 

xxxxx  Resume  with  main  program 


Global  Subroutine  *1 

Global  subroutine  *1  prompts  for  numeric  input;  a  single  tone  will  signal 
that  input  is  required.  If  the  input  provided  is  not  numeric,  the  prompt  will 
be  presented  again. 

The  input  value  must  pass  a  range  check.  If  the  input  is  out  of  range,  a 
user  is  informed  of  the  maximum  or  minimum  acceptable  value  and  reprompted. 
Global  subroutine  *1  has  a  built-in  option;  if  a  user  presses  only  the  R/S 
key,  he  will  be  prompted  with  the  current  value. 

To  use  *1,  the  indirect  ’-egister  pointer  in  register  24  must  be  set  to 
the  data  register  the  input  is  to  be  stored  in.  This  pointer  is  incremented 
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during  eacn  input  call  and  has  to  be  set  only  once  if  sequential  input  is  to 
be  stored  i.i  sequential  registers.  A  prompt  line  and  maximum  and  minimum 
acceptable  value  for  the  input  are  passed  to  the  subroutine  from  the  main  pro¬ 
gram.  The  subroutine  will  not  return  to  the  main  program  until  an  acceptable 
value  has  been  i  iput .  A  "=7"  is  automatically  appended  to  the  prompt.  If 
flag  "9M  is  set,  an  sign,  the  current  value  in  the  specified  register,  and 
a  "?"  are  added  to  the  prompt  and  displayed. 

Entry  conditions  when  calling  *1  are  as  follows:  register  X  must  contain 
the  minimum  acceptable  value,  register  Y  must  contain  the  maximum  acceptable 
value,  register  A  must  contain  the  prompt.  Register  24  must  contain  the 
address  of  the  register  that  the  input  is  to  be  stored  in. 

The  exit  conditions  from  *1  occur  when  an  acceptable  value  has  been 
entered;  *1  then  returns  to  the  calling  program.  (If  flag  "9"  is  set  and  R/S 
is  pressed  without  numeric  entry,  the  current  value  is  used.)  The  input  value 
is  stored  in  the  specified  register  and  in  the  X  register.  The  rest  of  the 
stack  should  be  considered  destroyed. 

A  sample  calling  sequence  follows: 


Program 


Instruction 

Explanation 

SF  09 

Optional:  used  if  "current  value"  of  variable  is  to  b 

presented  to  user  for  verification. 

30 

Identifies  register  address  where  input  is  to  be  stored 

STO  24 

Stores  indirect  register  address  in  register  24. 

123 

Specifies  maximum  acceptable  input  value 

ENTER 

Places  maximum  value  in  Y  register 

-37 

Specifies  minimum  acceptable  input  value  and  puts  in 

X  register 

"HEIGHT" 

Specifies  prompt  to  be  presented  to  user 

XEQ  "*I" 

Calls  subroutine  *1 

CF  09 

Used  only  if  SF  09  option  is  used 

xxxxxxxx 

Resume  with  main  program 

Note  that  if  input  is  sequential,  the  second  two  instructions  only  have  to  be 
programmed  before  the  first  variable  is  input.  Also,  if  the  current  value 
option  is  used,  make  sure  the  calculator  is  FIX*d  to  the  desired  setting 
before  calling  *1.  Note  that  *1  also  uses  global  subroutines  •’■t)  and  *D. 


This  subroutine  displays  labeled  output.  A  label  is  passed  to  the  sub¬ 
routine,  and  an  "■"  and  the  value  in  the  X  register  are  appended.  A  two-tone 
sequence  signals  output.  The  routine  then  displays  the  labeled  answer.  If  a 
printer  is  attached,  the  output  display  is  printed  and  the  program  continues 
execution  after  a  pause.  If  no  printer  is  attached,  program  execution  stops 
until  the  the  R/S  key  is  pressed. 

Before  executing  the  subroutine,  insure  that  register  X  contains  the 
numeric  data  to  be  displayed  and  that  register  A  contains  the  label  to  be 
appended.  When  the  subroutine  is  done,  it  returns  to  the  calling  program.  Mo 
registers  are  affected. 

A  sample  calling  sequence  follows: 


Program 

Instruction 

4.27 

"ANSWER" 

XEQ  "*0" 
xxxxxxxx 


Explanation 

Puts  value  to  be  displayed  in  X  register 
Puts  label  to  be  used  in  alpha  register 
Executes  the  *0  subroutine 
Resume  with  main  program 


Note  that  the  calculator  should  be  FlX^d  to  the  desired  accuracy  before  exe¬ 
cuting  *0.  Note  that  *0  also  uses  global  subroutine  *D. 


Global  Subroutine  *D 

This  subroutine  displays  an  alphanumeric  text  line.  A  two-tone  sequence 
is  used  to  signal  the  display;  the  routine  then  displays  the  contents  of  the 
alpha  register.  If  a  printer  is  attached,  the  output  is  printed  and 
displayed;  the  progran  continues  execution  after  a  pause.  If  no  printer  is 
attached,  progran  execution  stops  until  the  R/S  key  is  pressed. 

Before  executing  *D,  insure  that  register  A  contains  the  alphanumeric 
text  to  be  displayed.  When  *D  is  done,  it  returns  to  the  calling  progran.  No 
registers  are  affected. 

An  example  calling  sequence  follows: 

Progran 

Instructions  Explanation 

"SAKPLE"  Puts  text  to  be  displayed  in  alpha  register 

XEQ  "*D"  Execute  the  *D  subroutine 

Resume  with  main  program 


xxxxxxxx 


Global  Subroutine  *Y 

This  subroutine  takes  a  prompt  that  is  passed  to  it  and  appends  "(Y/N)?" 
to  it.  A  user  must  then  respond  with  "Y"  or  "N"  or  the  routine  will  reprompt. 
The  answer  to  the  query  is  returned  to  the  calling  program  as  flag  "10" 
status.  For  "Y"  responses,  flag  "10"  is  set;  for  "N"  responses,  it  is 
cleared.  The  routine  automatically  places  the  calculator  in  the  alpha  mode 
before  prompting  and  turns  off  the  alpha  mode  after  a  response  is  input. 

Before  executing  *Y,  insure  that  register  A  contains  the  query  text. 

When  *Y  is  done,  it  returns  to  the  calling  program.  Flag  "10"  status  is 
affected. 


A  sample  calling  sequence  follows: 


Program 

Instructions 

Exnlanation 

"PRINT" 

Puts  query  text  in  alpha  register 

XEQ  "*Y" 

Executes  the  *Y  subroutine 

FS?  10 

Tests  response:  set“yes;  clear=no 

xxxxxxxx 

Resume  with  main  progran 

Global  Subroutine  *A 

This  subroutine  prompts  a  user  for  alpha  input.  A  maximum  of  12  alpha 
characters  are  stored.  A  tone  sounds  to  signal  that  input  is  required.  A 
built-in  option  will  allow  you  to  prompt  with  the  "current  value"  of  the  alpha 
variable.  Under  this  option,  if  R/S  is  pressed,  the  "current  value"  of  the 
text  will  be  used  when  the  progran  continues  execution. 

This  subroutine  requires  that  the  indirect  register  address  (pointer) 
stored  in  register  24  be  set  to  the  data  register  the  alpha  input  is  to  be 
stored  in.  The  alpha  input  is  stored  in  two  registers,  six  characters  in 
each.  The  pointer  in  register  24  is  incremented  twice  during  each  input  call, 
so  it  only  has  to  be  set  once  if  a  string  of  input  is  to  be  put  in  sequential 
registers.  A  prompt  line  to  label  the  input  is  passed  to  the  subroutine,  and 
a  "■?"  is  added  to  this  prompt  by  the  subroutine. 

To  use  the  subroutine,  the  entry  conditions  must  be  satisfied.  Register 
"A”  must  contain  the  prompt.  Register  24  must  contain  the  address  of  the 
register  that  the  first  six  characters  of  the  input  will  be  stored  in.  If  you 
set  flag  "9"  before  calling  *A,  the  "current  value"  in  the  specified  registers 
will  be  appended  to  the  prompt  and  will  be  presented  for  vc  -  "ication.  If  a 
user  agrees  with  the  alpha  value  assigned,  he  would  press  the  R/S  key,  and  the 
program  would  use  that  alpha  value  for  the  variable.  If  a  user  elects  to 
change  the  value,  he  would  simply  enter  the  correct  alpha  string  (12  charac¬ 
ters  or  fewer)  and  then  press  the  R/S  key.  This  new  alpha  value  would  then  be 
used  in  place  of  the  "current  value." 
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The  following  exit  conditions  result:  *A  returns  to  the  calling  program, 
and  the  input  value  is  stored  in  the  specified  registers.  No  other  registers 
are  affected. 

A  sample  calling  sequence  follows: 


Pro  gran 


Instructions 

e&>  lass  fciea 

SF  09 

(Optional)  If  current  value  of  variable  is 
presented  to  user 

to  be 

30 

First  register  address  where  input  is  to  be 

stored 

STO  24 

Stores  first  indirect  register  address  in  register  24 

"VARIABLENAME  " 

Specifies  prompt  to  be  presented  to  user 

XEQ  ”*A" 

Calls  the  "*A"  subroutine 

CP  09 

Used  only  with  "SF  09"  option. 

XXXXXXXX 

Resume  with  main  progron. 

Note  that  if  input  is  sequential,  only  the  second  and  third  instructions  need 
to  be  programmed  before  the  first  variable  is  input. 


<elafeal  lutorg-utins  *£ 


This  subroutine  clears  a  specified  range  of  registers  by  storing  a  "0"  in 
them.  This  subroutine  should  be  used  instead  of  CLRG  so  that  the  contents  of 
registers  not  used  in  the  application  program  are  preserved. 


Before  the  subroutine  can  be  used,  the  entry  conditions  must  be  satis¬ 
fied.  Register  X  must  contain  the  range  of  registers  to  be  cleared;  the  for¬ 
mat  is  fff.lll,  where  fff  is  the  address  of  the  first  register  to  be  cleared 
and  111  is  the  address  of  the  last  register  to  be  cleared. 

After  the  specified  registers  have  been  cleared,  *C  exits  to  the  calling 
program.  The  stack  should  be  considered  destroyed. 


A  sample  calling  sequence  follows: 


Program 

SmtmstigM 

30.045 


XEQ  "*C" 
xxxxxxxx 


Explanation 

Specifies  address  of  registers  to  be  cleared 
(30  through  45) 

Calls  the  *C  subroutine 

Resume  with  main  program 


Global  Subroutine  *R 

This  subroutine  "rounds-up"  a  value  and  displays  the  integer  portion  of 
the  number.  The  subroutine  first  adds  0.99  to  the  value  stored  in  register  X, 
then  uses  the  integer  portion  of  that  value.  Before  entering  the  subroutine, 
insure  that  register  X  contains  the  value  to  be  rounded.  When  *R  is  done,  it 
returns  to  the  calling  program. 

A  sample  calling  sequence  follows: 


Program 

Instructions  Explanation 

5.49  Specifies  value  to  be  rounded;  could  also  be  a  recall 

RCL  instruction 


XEQ  *R  Calls  the  *R  subroutine 

xxxxxxxx  Resume  with  main  program 


Global  Subroutine  *P 

This  subroutine  displays  the  "END  PROGRAM"  message  in  large  type.  A 
two-tone  sequence  alerts  the  user;  *P  then  displays  the  message.  There  are  no 
pre-entry  conditions  for  *P.  The  subroutine  is  called  directly  with  the 
instruction,  "XEQ  *P".  When  *P  is  done,  it  returns  to  the  calling  program;  no 
registers  are  affected. 
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